home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 23 / Amiga Format AFCD23 (Feb 1998, Issue 107).iso / +look_here_1st!+ / handy_tools / mcxp335 / install_mui_mcx_prefs < prev    next >
Text File  |  1997-11-17  |  3KB  |  151 lines
  1. ;
  2. ; Installation script for MUI_MCX_Prefs
  3. ;
  4. ; -------------------------------------------------------------
  5. ; English strings (default) 
  6.  
  7. (if    (= @language "deutsch")
  8.         (
  9.             (set #msj1 "Installiere MUI_MCX_Prefs...")
  10.             (set #msj2 "Wo soll MUI_MCX_Prefs installiert werden ?")
  11.             (set #msj3 "Welche Sprachkataloge sollen installiert werden ?")
  12.             (set #msj4 "Installiere 'WBStart.library'...")
  13.             (set #msj5 "Installiere 'WBStart-Handler'...")
  14.             (set #msj6 "Installiere 'DosPath.library'...")
  15.         )
  16. )
  17.  
  18. ; German strings
  19.  
  20. (if    (= @language "english")
  21.         (
  22.             (set #msj1 "Installing MUI_MCX_Prefs...")
  23.             (set #msj2 "Where shall I install MUI_MultiCX_Prefs?")
  24.             (set #msj3 "Which languages do You wish to install ?")
  25.             (set #msj4 "Install 'WBStart.library'...")
  26.             (set #msj5 "Install 'WBStart-Handler'...")
  27.             (set #msj6 "Install 'DosPath.library'...")
  28.         )
  29. )
  30.  
  31. ; Spanish strings
  32.  
  33. (if (= @language "español")
  34.         (
  35.             (set #msj1 "Instalando MUI_MCX_Prefs...")
  36.             (set #msj2 "¿Dónde desea instalar MUI_MultiCX_Prefs?")
  37.             (set #msj3 "¿Qué idioma(s) desea instalar?")
  38.             (set #msj4 "Instalando 'WBStart.library'...")
  39.             (set #msj5"Instalando 'WBStart-Handler'...")
  40.             (set #msj6 "Instalando 'DosPath.library'...")
  41.         )
  42. )
  43.  
  44. ; Galician strings
  45.  
  46. (if    (= @language "galego")
  47.         (
  48.             (set #msj1 "Instalando MUI_MCX_Prefs...")
  49.             (set #msj2 "¿Onde desexa instalar MUI_MultiCX_Prefs?")
  50.             (set #msj3 "¿Qué língua(s) desexa instalar?")
  51.             (set #msj4 "Instalando 'WBStart.library'...")
  52.             (set #msj5 "Instalando 'WBStart-Handler'...")
  53.             (set #msj6 "Instalando 'DosPath.library'...")
  54.         )
  55. )
  56.  
  57. ; French strings
  58.  
  59. (if    (= @language "français")
  60.         (
  61.             (set #msj1 "Je suis en train de copier MUI_MCX_Prefs...")
  62.             (set #msj2 "Oú voulez-vous copier MUI_MultiCX_Prefs?")
  63.             (set #msj3 "Quelles sont les langues à installer?")
  64.             (set #msj4 "Je suis en train de copier 'WBStart.library'...")
  65.             (set #msj5 "Je suis en train de copier 'WBStart-Handler'...")
  66.             (set #msj6 "Je suis en train de copier 'DosPath.library'...")
  67.         )
  68. )
  69.  
  70. ; Start
  71.  
  72. (transcript #msj1)
  73.  
  74. (set name
  75.         (askdir
  76.             (prompt #msj2)
  77.             (help @askdir-help)
  78.             (default "SYS:Prefs")
  79.         )
  80. )
  81.  
  82. (copyfiles
  83.     (source "MUI_MCX_Prefs")
  84.     (infos)
  85.     (dest name)
  86. )
  87.  
  88. (set lang
  89.     (askoptions
  90.         (prompt #msj3)
  91.         (help @askoptions-help)
  92.         (choices "deutsch")
  93.         (default def-lang)
  94.     )
  95. )
  96.  
  97. (set n 0)
  98.  
  99. (while (set language (select n "deutsch" "" ) )
  100. (
  101.     (if (IN lang n)
  102.         (copyfiles
  103.             (source (cat "locale/" language ".catalog" ))
  104.             (dest (cat "LOCALE:catalogs/" language ))
  105.             (newname "mcxp.catalog")
  106.         )
  107.     )
  108.     (set n (+ n 1))
  109. ))
  110.  
  111.       (set vernum (getversion "intuition.library" (resident)))
  112.       (set ver (/ vernum 65536))
  113.  
  114.  
  115.       (if ( > ver 38)
  116.  
  117.           (copylib
  118.                 (prompt #msj4)
  119.                 (help @copylib-help)
  120.                 (source "libs/wbstart.library")
  121.                 (dest "libs:")
  122.                 (confirm)
  123.           )
  124.           
  125.           (copylib
  126.                 (prompt #msj5)
  127.                 (help @copylib-help)
  128.                 (source "l/WBStart-Handler")
  129.                 (dest "l:")
  130.                 (confirm)
  131.           )
  132.  
  133.       )
  134.  
  135.       (if ( > ver 38)
  136.  
  137.           (copylib
  138.                 (prompt #msj6)
  139.                 (help @copylib-help)
  140.                 (source "libs/dospath.library")
  141.                 (dest "libs:")
  142.                 (confirm)
  143.           )
  144.  
  145.           
  146.     )
  147.  
  148. (set @default-dest name)
  149.  
  150. (exit)
  151.